450 HOME : PRINT "PLEASE PRESS RETURN TO SEE THE": PRINT "UNCOMPACTED TEXT -->";: GET A$: PRINT
460 GOSUB 670: PRINT
470 PRINT : PRINT "PLEASE PRESS RETURN TO SEE THE": PRINT "COMPACTED TEXT -->";: GET A$: PRINT
480 GOSUB 710:AC = 1:TX = 0: GOTO 390
490 REM
500 IF AC < >1 AND TX < >1 THEN HOME : VTAB 10: PRINT "YOU HAVEN'T COMPACTED ANYTHING, SO THEREIS NOTHING TO UNCOMPACT! PLEASE CHOOSE ONE OF THE FIRST TWO OPTIONS BEFORE THISONE.": GOTO 390